EnigmA Amiga Run 1999 March/EnigmA AMIGA RUN 35 (1999)(G.R. Edizioni)(IT)[!][issue 1999-03].iso/earcd/devel/vbcc-68k-src/machines/amiga68k/libsrc/math/strtod.c

C/C++ Source or Header | 1999-01-01 | 185b | 11 lines

#include <stdio.h>

double strtod(const char *nptr,char **endptr)
{ double a;
  unsigned long n=0;
  sscanf(nptr,"%lf%ln",&a,&n);
  if(endptr)
    *endptr=(char *)nptr+n;
  return a;
}